home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
BBS Toolkit
/
BBS Toolkit.iso
/
qbbs
/
cbv226.zip
/
QBBSBAT3.TXT
< prev
next >
Wrap
Text File
|
1990-06-01
|
1KB
|
77 lines
@echo off
rem This is the QuickBBS batch file I use on my own system
rem Remove the leading @ if you're not running DOS 3.3
if "%1"=="m" goto maint
if "%1"=="M" goto maint
rem That just lets me force the EVENT routine by entering
rem C:\>qbbs m
:start
echo
echo Your quote for the day... > netlogo.txt
echo. >> netlogo.txt
quote >> netlogo.txt
echo. >> netlogo.txt
rem That just puts a random quote in my mailer's greeting file
bbs /f
rem That's my front end mailer
if errorlevel 24 goto 2400
if errorlevel 12 goto 1200
if errorlevel 3 goto 300
if errorlevel 2 goto maint
if errorlevel 1 goto local
goto quit
:2400
quickbbs -B2400 -E0
if errorlevel 10 goto cbv
goto start
:1200
quickbbs -B1200 -E0
if errorlevel 10 goto cbv
goto start
:300
quickbbs -B300 -E0
if errorlevel 10 goto cbv
goto start
:local
quickbbs -L -E0
if errorlevel 10 goto cbv
goto start
:restart
quickbbs -r -e0
if errorlevel 10 goto cbv
goto start
:cbv
cbv
if errorlevel 1 goto restart
goto start
:maint
cd twars
twmaint
cd ..
fd_upd
userpack -B -D21
usersort -B
msgutils killrecv 7
msgutils killcnt 1 2 3 5 6 7 8 -N100
msgpack -B
echo Backing up USERS.BBS...
if exist USERS.BK2 del USERS.BK2
if exist USERS.BK1 ren USERS.BK1 USERS.BK2
copy USERS.BBS USERS.BK1
goto start
:quit